(ls-lisp-format): Under -s, print the size in blocks with %4.0f, in case

they have a *really* huge file.

diff --git a/lisp/ls-lisp.el b/lisp/ls-lisp.el
index cdcc2f2a73b27fd68b99cf529beb640868ebebcf..a498c07321f26d6892229af0dfdbc005302589d4 100644 (file)
--- a/lisp/ls-lisp.el
+++ b/lisp/ls-lisp.el
@@ -257,7 +257,7 @@ are: A a c i r S s t u"
                (format "%6d " (nth 10 file-attr)))
            ;; nil is treated like "" in concat
            (if (memq ?s switches)      ; size in K
-               (format "%4d " (fceiling (/ file-size 1024.0))))
+               (format "%4.0f " (fceiling (/ file-size 1024.0))))
            (nth 8 file-attr)           ; permission bits
            ;; numeric uid/gid are more confusing than helpful
            ;; Emacs should be able to make strings of them.